home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / ISSUE15 / CPPCLASS / OWLDEL / comOWL.pas next >
Encoding:
Pascal/Delphi Source File  |  1996-07-17  |  1.6 KB  |  36 lines
  1. unit comOWL;
  2.  
  3. interface
  4. uses Classes, Wintypes;
  5.  
  6. type
  7.  TCMessageEvent = procedure (aMsg, wParam : Word; lParam: Longint) cdecl of object;
  8.  TCPPNotifyEvent = procedure (Sender : TObject) cdecl of object;
  9.  TCOMInterface = class
  10.      procedure SetVisible(aValue: boolean); virtual; cdecl; abstract;
  11.      function  GetVisible : boolean; virtual; cdecl; abstract;
  12.      procedure SetEnabled(aValue: boolean); virtual; cdecl; abstract;
  13.      function  GetEnabled : boolean; virtual; cdecl; abstract;
  14.      procedure SetOnMessage(func : TCMessageEvent); virtual; cdecl; abstract;
  15.      procedure BringToFront; virtual; cdecl; abstract;
  16.      function  ClientToScreen( pt : TPoint):TPoint; virtual; cdecl; abstract;
  17.      function  GetTextBuf(Buff : PChar; Len : integer): integer;
  18.                      virtual; cdecl; abstract;
  19.      function  GetTextLen:integer; virtual; cdecl; abstract;
  20.      procedure Hide; virtual; cdecl; abstract;
  21.      procedure Invalidate; virtual; cdecl; abstract;
  22.      procedure Refresh; virtual; cdecl; abstract;
  23.      procedure Repaint; virtual; cdecl; abstract;
  24.      function  ScreenToClient( pt:TPoint ):TPoint;   virtual; cdecl; abstract;
  25.      procedure ScrollBy(DeltaX , DeltaY : integer ); virtual; cdecl; abstract;
  26.      procedure SendToBack; virtual; cdecl; abstract;
  27.      procedure SetBounds( l, t, w, h : integer); virtual; cdecl; abstract;
  28.      procedure SetTextBuf( psz : pchar ); virtual; cdecl; abstract;
  29.      procedure Show;   virtual; cdecl; abstract;
  30.      procedure Update; virtual; cdecl; abstract;
  31. end;
  32.  
  33. implementation
  34.  
  35. end.
  36.